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Section 1 


Purppg* 


CRAYCDC is a FORTRAN subroutine to convert 64 bit binary 
data from a Cray Computer (IS or X-MP) to the corresponding 
64 bit binary data for a Control Data Corporation "Cyber 
2 XX" computer. It runs on the CDC "Cyber 2XX". 
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Section 2 


Usage 


The entry point to the subroutine is CRAYCDC. To call the 
subroutine use the following FORTRAN statement: 

CALL CRAYCDC (NWORDS, VECTIN, VECTOUT, ITYPE , I ERROR) where 
the arguments have the following definitions: 

NWORDS The number of CRAY words to be converted. 

Must be integer. 


VECTIN* 


VECTOUT* 


ITYPE 


I ERROR 


Is a vector of CRAY words to be converted 
to H CYBER 2 XX" format. VECTIN may be 
Real or Integer. 

Is a vector to receive the converted 
words. This vector is the result and is 
in "CYBER 2 XX" format (binary) . VECTOUT 
may be Real or Integer. 

Is a value which specifies the type of 
conversion. (see Table I) . ITYPE must 
be integer. 

Is a value assigned should an error be 
detected (see Table II) . IERROR is an 
integer. 


Table I - Conversion Options 


ITYPE Definition 

1 Integer conversion of CRAY to "CYBER 

2 XX" . 

2 Real conversion of CRAY to "CYBER 2XX" . 


♦Note: 

VECTIN and VECTOUT may be the same vectors. 
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Table II - TERROR frror codes returned 1 


TERROR PtflnltlM 

0 No error 

1 Argument value of NWORDS is incorrect. 

NWORDS must be a positive integer. 

2 Argument value of ITYPE is incorrect. 

Value of ITYPE must be an integer of 1 or 

2. (see table I) 

3 Cannot convert a real variable. 

VECTIN value was indefinite or out of 
range. Result stored in VECTOUT is set to 
63 one bits. (a "CYBER 2 XX" indefinite.) 

4 Cannot convert an integer variable. 

VECTIN was too large or small to convert to 
"CYBER 2 XX" format. Result stored in 
VECTOUT is set to 63 one bits. (a "CYBER 

2 XX" indefinite.) 


Notes: When I ERROR is returned to calling modules with a 

value of 1 or 2, the call to CRAYCDC was aborted 
and no conversion attempted. VECTIN and VECTOUT 
remains as called. 

When IERROR is returned to calling module with a 
value of 3 or 4, words which were convertible were 
converted. 
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Section 3 




This subroutine requires 1FD Hex or 509 decimal words of 
'•CYBER 2 XX" memory. 


I 


I 
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Section 4 

Timing Consideration 


For each group of fifty integers convartad from CRAY binary 
to CYBER 2 XX binary approximately 0.00070 seconds are 
required. Approximately 0.00188 seconds are required to 
convert fifty real binary numbers from the CRAY internal 
format to the CYBER 2 XX internal format. The following 
graph illustrates these timings. 
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Section 5 
Accaes to CRAY CPC 


To link the library containing tha subroutine CRAYCDC on the 
ARC Cyber 205 the user needs only to make an entry on the 
LOAD statement in the job control sequence. 

LOAD, user lfn,LIB«SOFTLIB, users other info. 
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Section 6 


Egiaali 


Convert a vactor of 512 Integers from the CRAY to a vector 
of Integers for the "CYBER 2XX". In this example I CRAY is 
vector of Integers to be converted to a vector of integers 
named ICDC. 

DIMENSION I CRAY ( 512 ), ICDC (512) 


• 

ITYPE-1 

KOUNT-512 

CALL CRAYCDC ( KOUNT , I CRAY , ICDC , KTYPE , I ERROR) 
IF (ERROR. NE.O) Go to error processing 



7. AwWarUI 

Clay Con J. Gut at 

Infornatlca Ganaral Corporation 
1121 San Antonio Road 
Palo Alto, CA 943C3 


a Nrtwwxm Mapvi M*. 

TN 84-7104-101-16 

io. wwt um m. 

10707 

V Cmm m Omt Mi. 

NAS3-11555 

1a Trm •' lU—w mt Pmm4 Ct> mm 


1} 


National Aeronautics and Space Administration 
Washington, D.C. 


Contractor Report 


i«. ipwie 

999-53-02 


is iwMMnwtur* Hmm Robert A. Carlson 

Point of Contact: MS233-15 

Ames Research Center 


(415) 694-6036 
FTS 448-6036 


Moffett Field. CA 94035 

II Atovaci 


CRAYCDC is a Fortran subroutine which runs on the CDC Cyber 205. It 
converts 64 bit binary data from a Cray computer (IS or X-MP) to the 
corresponding 64 bit binary data for a Cyber 205. 
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